home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
edit
/
me_cd25.zip
/
MC2MUTT.ZIP
/
MOD.MUT
< prev
next >
Wrap
Lisp/Scheme
|
1992-11-09
|
142b
|
4 lines
;; mod.mut : modulo
;; (mod n base) == n modulo base == n - (n/base)*base
(defun mod (int n base) HIDDEN { (- n (* (/ n base) base)) } )